object fmPrintPreview: TfmPrintPreview
  Left = 0
  Top = 0
  Caption = 'Print Preview'
  ClientHeight = 423
  ClientWidth = 919
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  WindowState = wsMaximized
  PixelsPerInch = 96
  TextHeight = 13
  object frxPreview1: TfrxPreview
    Left = 0
    Top = 29
    Width = 919
    Height = 394
    Align = alClient
    OutlineVisible = False
    OutlineWidth = 120
    ThumbnailVisible = False
    UseReportHints = True
    ExplicitLeft = -8
    ExplicitTop = 33
    ExplicitHeight = 382
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 919
    Height = 29
    ButtonHeight = 25
    ButtonWidth = 57
    Caption = 'ToolBar1'
    EdgeBorders = [ebLeft, ebTop, ebRight, ebBottom]
    TabOrder = 1
    object ToolButton1: TToolButton
      Left = 0
      Top = 0
      Width = 8
      Caption = 'ToolButton1'
      ImageIndex = 1
      Style = tbsSeparator
    end
    object btnPrint: TToolButton
      Left = 8
      Top = 0
      AutoSize = True
      Caption = '&Print'
      ImageIndex = 0
      Style = tbsTextButton
      OnClick = btnPrintClick
    end
  end
  object frxReport1: TfrxReport
    Version = '4.12.2'
    DotMatrixReport = False
    IniFile = '\Software\Fast Reports'
    Preview = frxPreview1
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Default'
    PrintOptions.PrintOnSheet = 9
    ReportOptions.CreateDate = 41021.327398483800000000
    ReportOptions.LastChange = 41021.924000555600000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'begin'
      ''
      'end.')
    Left = 40
    Top = 184
    Datasets = <
      item
        DataSet = frxDBDataset1
        DataSetName = 'frxDBDataset1'
      end
      item
        DataSet = frxDBDataset2
        DataSetName = 'frxDBDataset2'
      end>
    Variables = <>
    Style = <>
    object Data: TfrxDataPage
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
    end
    object Page1: TfrxReportPage
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -19
      Font.Name = 'Arial Black'
      Font.Style = [fsBold]
      PaperWidth = 210.000000000000000000
      PaperHeight = 297.000000000000000000
      PaperSize = 9
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      PrintOnPreviousPage = True
      object MasterData1: TfrxMasterData
        Height = 287.244280000000000000
        Top = 18.897650000000000000
        Width = 718.110700000000000000
        DataSet = frxDBDataset1
        DataSetName = 'frxDBDataset1'
        RowCount = 0
        StartNewPage = True
        object Memo1: TfrxMemoView
          Left = 3.779530000000000000
          Top = 3.779529999999990000
          Width = 245.669450000000000000
          Height = 22.677180000000000000
          ShowHint = False
          AutoWidth = True
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'Arial Black'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'LENSWORKS PRODUCTION')
          ParentFont = False
        end
        object Memo2: TfrxMemoView
          Left = 249.448980000000000000
          Top = 7.559059999999991000
          Width = 102.047310000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -12
          Font.Name = 'Arial Black'
          Font.Style = []
          Memo.UTF8W = (
            '(002079022-M)')
          ParentFont = False
        end
        object Memo4: TfrxMemoView
          Left = 3.779530000000000000
          Top = 26.456710000000000000
          Width = 347.716760000000000000
          Height = 98.267780000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '2nd FLOOR NO. 10'
            'JALAN SS 7/16 KELANA JAYA'
            '47301 P. JAYA SELANGOR'
            'WEST MALAYSIA'
            'PHONE'#9'+6012 290 6348 / +6017 238 9377'
            'EMAIL'#9'aaronleekm@gmail.com')
          ParentFont = False
        end
        object Memo5: TfrxMemoView
          Left = 555.590910000000000000
          Top = 64.252010000000000000
          Width = 83.149660000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            'Invoice No.:')
          ParentFont = False
        end
        object frxDBDataset1INVOICE_NO: TfrxMemoView
          Left = 646.299630000000000000
          Top = 64.252010000000000000
          Width = 71.811070000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'INVOICE_NO'
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = '%.5d'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haRight
          Memo.UTF8W = (
            '[frxDBDataset1."INVOICE_NO"]')
          ParentFont = False
        end
        object Memo6: TfrxMemoView
          Left = 555.590910000000000000
          Top = 94.488250000000000000
          Width = 49.133890000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            'Date:')
          ParentFont = False
        end
        object frxDBDataset1INVOICE_DATE: TfrxMemoView
          Left = 612.283860000000000000
          Top = 94.488250000000000000
          Width = 105.826840000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'INVOICE_DATE'
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = 'dd mmm yyyy'
          DisplayFormat.Kind = fkDateTime
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haRight
          Memo.UTF8W = (
            '[frxDBDataset1."INVOICE_DATE"]')
          ParentFont = False
        end
        object frxDBDataset1COMPANY_NAME: TfrxMemoView
          Left = 3.779530000000000000
          Top = 170.078850000000000000
          Width = 347.716760000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[Uppercase(<frxDBDataset1."COMPANY_NAME">)]')
          ParentFont = False
        end
        object Memo7: TfrxMemoView
          Left = 3.779530000000000000
          Top = 151.181200000000000000
          Width = 60.472480000000000000
          Height = 15.118120000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'TO:')
          ParentFont = False
        end
        object frxDBDataset1ADDRESS: TfrxMemoView
          Left = 3.779530000000000000
          Top = 188.976500000000000000
          Width = 347.716760000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[Uppercase(<frxDBDataset1."ADDRESS">)]')
          ParentFont = False
        end
        object frxDBDataset1CITY: TfrxMemoView
          Left = 3.779530000000000000
          Top = 207.874150000000000000
          Width = 347.716760000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            
              '[<frxDBDataset1."POSTCODE"> + '#39' '#39' + Uppercase(<frxDBDataset1."CI' +
              'TY">) + '#39' '#39' + Uppercase(<frxDBDataset1."STATE">)]')
          ParentFont = False
        end
        object frxDBDataset1COMPANY_TEL: TfrxMemoView
          Left = 3.779530000000000000
          Top = 245.669450000000000000
          Width = 158.740260000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '['#39'TEL: '#39' + <frxDBDataset1."COMPANY_TEL">]')
          ParentFont = False
        end
        object frxDBDataset1COUNTRY: TfrxMemoView
          Left = 3.779530000000000000
          Top = 226.771800000000000000
          Width = 238.110390000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[Uppercase(<frxDBDataset1."COUNTRY">)]')
          ParentFont = False
        end
        object frxDBDataset1COMPANY_FAX: TfrxMemoView
          Left = 3.779530000000000000
          Top = 264.567100000000000000
          Width = 158.740260000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '['#39'FAX: '#39' + <frxDBDataset1."COMPANY_FAX">]')
          ParentFont = False
        end
        object Memo8: TfrxMemoView
          Left = 366.614410000000000000
          Top = 151.181200000000000000
          Width = 60.472480000000000000
          Height = 15.118120000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'FOR:')
          ParentFont = False
        end
        object frxDBDataset1FOR: TfrxMemoView
          Left = 366.614410000000000000
          Top = 170.078850000000000000
          Width = 351.496290000000000000
          Height = 113.385900000000000000
          ShowHint = False
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[Uppercase(<frxDBDataset1."FOR">)]')
          ParentFont = False
          WordBreak = True
        end
        object Memo3: TfrxMemoView
          Left = 582.047620000000000000
          Top = 3.779529999999990000
          Width = 132.283550000000000000
          Height = 34.015770000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -27
          Font.Name = 'Arial Black'
          Font.Style = []
          Memo.UTF8W = (
            'INVOICE')
          ParentFont = False
        end
      end
      object DetailData1: TfrxDetailData
        Height = 86.929190000000000000
        Top = 374.173470000000000000
        Width = 718.110700000000000000
        DataSet = frxDBDataset2
        DataSetName = 'frxDBDataset2'
        RowCount = 0
        object frxDBDataset2DESCRIPTION: TfrxMemoView
          Left = 7.559060000000000000
          Top = 1.779530000000022000
          Width = 551.811380000000000000
          Height = 83.149660000000000000
          ShowHint = False
          DataField = 'DESCRIPTION'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset2'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          Memo.UTF8W = (
            '[frxDBDataset2."DESCRIPTION"]')
          ParentFont = False
        end
        object frxDBDataset2AMOUNT: TfrxMemoView
          Left = 578.268090000000000000
          Top = 2.000000000000000000
          Width = 136.063080000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'AMOUNT'
          DataSet = frxDBDataset2
          DataSetName = 'frxDBDataset2'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          HAlign = haRight
          Memo.UTF8W = (
            '[frxDBDataset2."AMOUNT"]')
          ParentFont = False
        end
        object Line3: TfrxLineView
          Width = 718.110236220471900000
          ShowHint = False
          Frame.Typ = [ftTop]
        end
      end
      object Header1: TfrxHeader
        Height = 22.677180000000000000
        Top = 328.819110000000000000
        Width = 718.110700000000000000
        object Memo9: TfrxMemoView
          Left = 7.559060000000000000
          Top = 2.000000000000000000
          Width = 551.811380000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8W = (
            'DESCRIPTION')
          ParentFont = False
        end
        object Memo10: TfrxMemoView
          Left = 578.268090000000000000
          Top = 2.000000000000000000
          Width = 132.283550000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8W = (
            'AMOUNT (RM)')
          ParentFont = False
        end
        object Line1: TfrxLineView
          Width = 718.110236220471900000
          ShowHint = False
          Frame.Typ = [ftTop]
        end
      end
      object Footer1: TfrxFooter
        Height = 377.953000000000000000
        Top = 483.779840000000000000
        Width = 718.110700000000000000
        object Memo11: TfrxMemoView
          Left = 498.897960000000000000
          Top = 2.000000000000057000
          Width = 60.472480000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          HAlign = haRight
          Memo.UTF8W = (
            'TOTAL')
          ParentFont = False
        end
        object frxDBDataset1TOTAL_AMOUNT: TfrxMemoView
          Left = 577.709030000000000000
          Top = 2.000000000000057000
          Width = 136.063080000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'TOTAL_AMOUNT'
          DataSet = frxDBDataset1
          DataSetName = 'frxDBDataset1'
          DisplayFormat.FormatStr = '%2.2n'
          DisplayFormat.Kind = fkNumeric
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Arial'
          Font.Style = []
          HAlign = haRight
          Memo.UTF8W = (
            '[frxDBDataset1."TOTAL_AMOUNT"]')
          ParentFont = False
        end
        object Line4: TfrxLineView
          Width = 718.110236220471900000
          ShowHint = False
          Frame.Typ = [ftTop]
        end
        object Line5: TfrxLineView
          Top = 22.677179999999800000
          Width = 718.110236220471900000
          ShowHint = False
          Frame.Typ = [ftTop]
        end
        object Rich1: TfrxRichView
          Left = 3.779530000000000000
          Top = 113.385900000000000000
          Width = 634.961040000000000000
          Height = 238.110390000000000000
          ShowHint = False
          GapX = 2.000000000000000000
          GapY = 1.000000000000000000
          RichEdit = {
            7B5C727466315C616E73695C616E73696370673933365C64656666305C646566
            6C616E67313033335C6465666C616E676665323035327B5C666F6E7474626C7B
            5C66305C666E696C5C66636861727365743020417269616C3B7D7B5C66315C66
            6E696C5C6663686172736574313334205461686F6D613B7D7D0D0A7B5C2A5C67
            656E657261746F72204D7366746564697420352E34312E32312E323531303B7D
            5C766965776B696E64345C7563315C706172645C66733234204D616B65206120
            6368657175652070617961626C6520746F205C62204C454E53574F524B532050
            524F44554354494F4E5C62305C7061720D0A5C756C2054686520636865717565
            2077696C6C20636F6C6C65637420333020646179732061667465722074686520
            7075626C69736820646174655C756C6E6F6E655C7061720D0A496620796F7520
            6861766520616E79207175657374696F6E7320636F6E6365726E696E67207468
            697320696E766F6963652C20636F6E74616374204161726F6E204C6565203031
            322032393020363334385C6C616E67323035325C66315C667331365C7061720D
            0A5C7061720D0A5C7061720D0A5C7061720D0A5C7061720D0A5C6C616E673130
            33335C625C66305C6673323420415050524F5645442042595C7061720D0A5C70
            61720D0A5C7061720D0A5C7061720D0A4141524F4E204C45455C7061720D0A4D
            414E4147494E47204449524543544F525C7061720D0A7D0D0A00}
        end
      end
    end
  end
  object frxDBDataset1: TfrxDBDataset
    UserName = 'frxDBDataset1'
    CloseDataSource = False
    DataSet = DataModule1.qryPrintInvoice
    BCDToCurrency = False
    Left = 40
    Top = 64
  end
  object frxDBDataset2: TfrxDBDataset
    UserName = 'frxDBDataset2'
    CloseDataSource = False
    DataSet = DataModule1.fbPrintInvoiceDetails
    BCDToCurrency = False
    Left = 40
    Top = 120
  end
  object frxRichObject1: TfrxRichObject
    Left = 40
    Top = 240
  end
end
